home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 2 / BBS in a box - Trilogy II.iso / Files / Hyper / D / DataChef v1.3 / background_8459.xml < prev    next >
Encoding:
Extensible Markup Language  |  1992-11-22  |  5.1 KB  |  147 lines

  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>8459</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_6836.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3092.css" />
  11.     <part>
  12.         <id>1</id>
  13.         <type>field</type>
  14.         <visible> <true /> </visible>
  15.         <dontWrap> <false /> </dontWrap>
  16.         <dontSearch> <true /> </dontSearch>
  17.         <sharedText> <false /> </sharedText>
  18.         <fixedLineHeight> <false /> </fixedLineHeight>
  19.         <autoTab> <false /> </autoTab>
  20.         <lockText> <true /> </lockText>
  21.         <rect>
  22.             <left>40</left>
  23.             <top>19</top>
  24.             <right>468</right>
  25.             <bottom>78</bottom>
  26.         </rect>
  27.         <style>rectangle</style>
  28.         <autoSelect> <false /> </autoSelect>
  29.         <showLines> <false /> </showLines>
  30.         <wideMargins> <false /> </wideMargins>
  31.         <multipleLines> <false /> </multipleLines>
  32.         <reservedFamily> 0 </reservedFamily>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Geneva</font>
  37.         <textSize>20</textSize>
  38.         <textStyle>bold</textStyle>
  39.         <textHeight>26</textHeight>
  40.         <name>Book Title</name>
  41.         <script></script>
  42.     </part>
  43.     <part>
  44.         <id>2</id>
  45.         <type>field</type>
  46.         <visible> <true /> </visible>
  47.         <dontWrap> <false /> </dontWrap>
  48.         <dontSearch> <true /> </dontSearch>
  49.         <sharedText> <true /> </sharedText>
  50.         <fixedLineHeight> <false /> </fixedLineHeight>
  51.         <autoTab> <false /> </autoTab>
  52.         <lockText> <true /> </lockText>
  53.         <rect>
  54.             <left>188</left>
  55.             <top>79</top>
  56.             <right>314</right>
  57.             <bottom>96</bottom>
  58.         </rect>
  59.         <style>transparent</style>
  60.         <autoSelect> <false /> </autoSelect>
  61.         <showLines> <false /> </showLines>
  62.         <wideMargins> <false /> </wideMargins>
  63.         <multipleLines> <false /> </multipleLines>
  64.         <reservedFamily> 0 </reservedFamily>
  65.         <titleWidth>0</titleWidth>
  66.         <icon>0</icon>
  67.         <textAlign>center</textAlign>
  68.         <font>Geneva</font>
  69.         <textSize>9</textSize>
  70.         <textStyle>outline</textStyle>
  71.         <textStyle>bold</textStyle>
  72.         <textHeight>12</textHeight>
  73.         <name></name>
  74.         <script></script>
  75.     </part>
  76.     <part>
  77.         <id>3</id>
  78.         <type>field</type>
  79.         <visible> <true /> </visible>
  80.         <dontWrap> <false /> </dontWrap>
  81.         <dontSearch> <true /> </dontSearch>
  82.         <sharedText> <false /> </sharedText>
  83.         <fixedLineHeight> <false /> </fixedLineHeight>
  84.         <autoTab> <false /> </autoTab>
  85.         <lockText> <true /> </lockText>
  86.         <rect>
  87.             <left>40</left>
  88.             <top>113</top>
  89.             <right>468</right>
  90.             <bottom>294</bottom>
  91.         </rect>
  92.         <style>scrolling</style>
  93.         <autoSelect> <false /> </autoSelect>
  94.         <showLines> <false /> </showLines>
  95.         <wideMargins> <false /> </wideMargins>
  96.         <multipleLines> <false /> </multipleLines>
  97.         <reservedFamily> 0 </reservedFamily>
  98.         <titleWidth>0</titleWidth>
  99.         <icon>0</icon>
  100.         <textAlign>left</textAlign>
  101.         <font>Geneva</font>
  102.         <textSize>12</textSize>
  103.         <textStyle>bold</textStyle>
  104.         <textHeight>16</textHeight>
  105.         <name>Table of Contents</name>
  106.         <script>on mouseUp
  107. if me is empty then
  108. answer "No recipes to delete!"
  109. lock screen
  110. go cd "Table of Contents"
  111. exit mouseUp
  112. end if
  113. if the value of the clickLine is not empty then
  114. select the clickLine
  115. put the value of the clickLine into thisChapter
  116. hide bg button "Abort!"
  117. answer "Delete chapter" && thisChapter && "and all of its recipes?" with "Abort" or "Proceed"
  118. if it is "Abort" then
  119. lock screen
  120. show bg button "Abort!"
  121. go cd "Table of Contents"
  122. exit mouseUp
  123. end if
  124. if it is "Proceed" then
  125. set cursor to watch
  126. lock screen
  127. show bg button "Abort!"
  128. repeat with x = 1 to number of lines of bg fld "Recipes List" of cd thisChapter
  129. put line x of bg fld "Recipes List" of cd thisChapter into thisRecipe
  130. go cd thisRecipe
  131. doMenu "Delete Card"
  132. end repeat
  133. go cd thisChapter
  134. doMenu "Delete Card"
  135. go cd "Table of Contents"
  136. unlock screen
  137. repeat with x = 1 to number of lines of bg fld "Table of Contents"
  138. if line x of bg fld "Table of Contents" is thisChapter then
  139. select line x of bg fld "Table of Contents"
  140. delete line x of bg fld "Table of Contents"
  141. if last char of bg fld "Table of Contents" is return then delete last char ¬¨
  142. of bg fld "Table of Contents"
  143. exit repeat
  144. end if
  145. end repeat
  146. end if
  147. end if
  148. end mouseUp
  149.  
  150.  
  151. </script>
  152.     </part>
  153.     <part>
  154.         <id>4</id>
  155.         <type>button</type>
  156.         <visible> <true /> </visible>
  157.         <reserved5> 0 </reserved5>
  158.         <reserved4> 0 </reserved4>
  159.         <reserved3> 0 </reserved3>
  160.         <reserved2> 0 </reserved2>
  161.         <reserved1> 0 </reserved1>
  162.         <enabled> <true /> </enabled>
  163.         <rect>
  164.             <left>390</left>
  165.             <top>309</top>
  166.             <right>468</right>
  167.             <bottom>331</bottom>
  168.         </rect>
  169.         <style>rectangle</style>
  170.         <showName> <true /> </showName>
  171.         <highlight> <false /> </highlight>
  172.         <autoHighlight> <true /> </autoHighlight>
  173.         <sharedHighlight> <true /> </sharedHighlight>
  174.         <family>0</family>
  175.         <titleWidth>0</titleWidth>
  176.         <icon>0</icon>
  177.         <textAlign>center</textAlign>
  178.         <font>Chicago</font>
  179.         <textSize>12</textSize>
  180.         <textStyle>plain</textStyle>
  181.         <name>Abort!</name>
  182.         <script>on mouseUp
  183. lock screen
  184. go cd "Table of Contents"
  185. end mouseUp</script>
  186.     </part>
  187.     <content>
  188.         <layer>background</layer>
  189.         <id>2</id>
  190.         <text>Table of Contents</text>
  191.     </content>
  192.     <name></name>
  193.     <script></script>
  194. </background>
  195.